#include "device_type.h"
#ifdef SM_RL
#include "app_api.h"
#include "app_log.h"
#include "app_cli_cmd.h"
#include "bsp_gpio.h"
#include "app_button.h"
#include "app_led.h"
#include "bsp_iadc.h"
#include "em_emu.h"
#include "softwareMultiTimer.h"
#include "device.h"
#include "bsp_system.h"
#include "net_protocol.h"
#include "app_key_value.h"
#include "bsp_rmu.h"
#include "bsp_wdog.h"
#include "RBFVersion.h"
#include "git_version.h"
#include "net_aseq.h"

#define DEVICE_TX_POWER_DEFAULT  (200)
#define DEVICE_CTUNE_DEFAULT     (125)
#define DEVICE_LFXO_CTUNE_DEFAULT (40)
#define IADC_TIMER_INTERVAL      (240)
#define APP_MAJOR_VERSION        (1)
#define APP_MINOR_VERSION        (1)
#define APP_STAGE_VERSION        (2) //max 255
#define SENSOR_VERSION           ((APP_MAJOR_VERSION << 16)|(APP_MINOR_VERSION<<8)|(APP_STAGE_VERSION))

#define IS_PULSE_MODE(a)    (a[0] & 0x10)
#define IS_PULSE_NO(a)       (a[0] & 0x0C)
#define PUSE_TIME(a)        (a[2] ? ((uint32_t)a[2] << 15) : 16384)

static void setTxpowerDefaule(void);
static void setCtuneDefaule(void);
static void setLfxoCtuneDefaule(void);
static void gpio_state_change_handler(void);
static void SM_button_init(void);
static void SM_relay_gpio_init(void);
static void SM_relay_gpio_state_set(bool state);
static uint32_t SM_relay_state_get(void);
static void SM_iadc_init(void);
static void printSoftWareInformation(void);

static uint8_t s_option[3] = {0x00};
static MultiTimer optionTimer = {.Handle = 0};

static void optionTimeroutHandlerCallback(MultiTimer* timer, void *userData);
/**
 * @brief: 弱点继电器项目相关外设初始化
 * */
void SM_main(void)
{
  setTxpowerDefaule();
  setCtuneDefaule();
  setLfxoCtuneDefaule();
  SM_button_init();
  SM_relay_gpio_init();
  SM_iadc_init();
  startWatchDogTimer();
  printSoftWareInformation();
}

/**
 * @brief: 遥控器项目while函数相关处理
 * */
void SM_process(void)
{
  feedWatchDogHandler();
  SM_key_value_handler();
  gpio_state_change_handler();
}

/******************get device sleep state***************************/

bool device_sleep_state_get(void)
{
  return true;
}

/**************** set tx power/ctune defaule***********************/
static void setTxpowerDefaule(void)
{
  int16_t txPowerDeciDbm = 0;
  int ret = getThisParam(RfTxPower, &txPowerDeciDbm);
  if(ret != 0) {
      txPowerDeciDbm = DEVICE_TX_POWER_DEFAULT;
      setThisParam(RfTxPower, &txPowerDeciDbm);
  }
  RAIL_Status_t status = bsp_rf_set_tx_power_bdm(txPowerDeciDbm);
  if (status != RAIL_STATUS_NO_ERROR) {
      DS_app_log_error("set tx power error, status = 0x%x\r\n", status);
  }
}

static void setCtuneDefaule(void)
{
  uint32_t ctune = 0;
  int ret = getThisParam(RfCtune, &ctune);
  if(ret != 0) {
      ctune = DEVICE_CTUNE_DEFAULT;
      setThisParam(RfCtune, &ctune);
  }
  RAIL_Status_t status = bsp_rf_set_ctune(ctune);
  if (status != RAIL_STATUS_NO_ERROR) {
      DS_app_log_error("set ctune error, status = 0x%x\r\n", status);
  }
}

static void setLfxoCtuneDefaule(void)
{
  uint8_t ctune = 0;
  int ret = getThisParam(lfxoCtune, &ctune);
  if(ret != 0) {
      ctune = DEVICE_LFXO_CTUNE_DEFAULT;
      setThisParam(lfxoCtune, &ctune);
  }
  CMU_OscillatorTuningSet(cmuOsc_LFXO,ctune);
}

/************************button handler****************************/

static struct Button btn = {0};
static MultiTimer buttonTimer = {.Handle = 0};

static void ds_btn_state_change_callback(uint8_t intNo, void *ctx);

static ds_button_t button = {
    .port = gpioPortA,
    .pin = 5,
    .mode = gpioModeInputPull,
    .initial = 1,
    .valid = 0,
    .ds_button_state_change = ds_btn_state_change_callback,
};


/**
 * @brief: button timer callback,每10ms轮询一次button状态
 * */
static void buttonTimerCallback(MultiTimer* timer, void *userData)
{
  (void)userData;
  if(timer->Handle == 0) {
      button_handler(&btn);
  }
}

/**
 * @brief:button 1 引脚状态改变时启动button timer
 * */
static void ds_btn_state_change_callback(uint8_t intNo, void *ctx)
{
  (void)intNo;
  ds_button_t *btnDrive = (ds_button_t *)ctx;

  if(btnDrive->port == button.port && btnDrive->pin == button.pin && buttonTimer.status == EN_MULTITIMER_STATUS_IDLE) {
      button_handler(&btn);
  }
}
/**
 * @brief: 读取button引脚状态
 * @param： button id
 * @return： gpio 状态
 * */
static uint8_t read_button_GPIO(uint8_t button_id)
{
  // you can share the GPIO read function with multiple Buttons
  switch(button_id)
  {
    case 0:
      return read_button_level(&button);
      break;
    default:
      return 0;
      break;
  }
}

bool isBattVoltageHigh(void)
{
  return true;
}

static uint8_t s_state = 0;
static void btn_press_start_handler(void* butt)
{
  Button *btn = (Button *)butt;
  keyValue_t outputKeyValue ={0x00};

  outputKeyValue.id = 0x10;
  outputKeyValue.valueSize = 2;

  if(btn->event == LONG_PRESS_START) {
      startCommissiongJoin(buttonTrigger, other_device);
  }
  else if(btn->event == SINGLE_CLICK) {

      if(IS_PULSE_MODE(s_option)){

          if(optionTimer.status == EN_MULTITIMER_STATUS_IDLE){
              if(IS_PULSE_NO(s_option))
              {
                SM_relay_gpio_state_set(1);
                s_state = 0;
              }
              else
              {
                SM_relay_gpio_state_set(0);
                s_state = 1;
              }
              softwareMultiTimerStart(EN_LP_HARD_TIMER_EM3_SYS_RTC_1, &optionTimer, PUSE_TIME(s_option),  optionTimeroutHandlerCallback,NULL,1);
          }

      }
      else{

        s_state = SM_relay_state_get();
        SM_relay_gpio_state_set(!s_state);
        s_state = SM_relay_state_get();
        outputKeyValue.value[0] = s_state;
        set_key_value(&outputKeyValue);

      }
      DS_app_log_error("reg btn test \r\n");
  }
}

static void gpio_state_change_handler(void)
{
  if(read_button_level(&button) == button.valid) {
      if(buttonTimer.status == EN_MULTITIMER_STATUS_IDLE) {
          button_handler(&btn);
      }
  }
}

/**
 * @brief: button reed初始化；注册不同状态相关回调函数
 * */
static void SM_button_init(void)
{
  ds_button_init(&button);

  uint8_t data[5] = {0, 3, 0, 0, 1};
  SM_led_start(data, POWER_ON_BLINK);

  button_init(&btn, &buttonTimer, buttonTimerCallback, read_button_GPIO, button.valid, 0);
  button_attach(&btn, LONG_PRESS_START,       btn_press_start_handler);
  button_attach(&btn, SINGLE_CLICK,       btn_press_start_handler);
}

/************************led init***************************************/

static MultiTimer ledTimer;
static led_ins_t ledDriver = {0x00};

static ds_gpio_t led[3] = {
  {
      .port = gpioPortC,
      .pin = 2,
      .mode = gpioModePushPull,
      .initial = 1,
      .valid = 0,
  },
  {
      .port = gpioPortC,
      .pin = 1,
      .mode = gpioModePushPull,
      .initial = 1,
      .valid = 0,
  },
  {
      .port = gpioPortC,
      .pin = 3,
      .mode = gpioModePushPull,
      .initial = 1,
      .valid = 0,
  },
};

/**
 * @brief: led闪烁开始
 * @param： led物模型指针；5Bytes：R G Bbitmask bitTime cycleTimes
 * */
void SM_led_start(uint8_t *data, blinkType_t type)
{
  led_driver_init(&ledDriver, &ledTimer, led[0], led[1], led[2], data, type);
}

/***********************relay and led init**********************/

static ds_gpio_t onoffLed[2] = {
  {
      .port = gpioPortC,
      .pin = 0,
      .mode = gpioModePushPull,
      .initial = 1,
      .valid = 0,
  },
  {
      .port = gpioPortC,
      .pin = 4,
      .mode = gpioModePushPull,
      .initial = 0,
      .valid = 0,
  },
};

static ds_gpio_t relay = {
    .port = gpioPortC,
    .pin = 6,
    .mode = gpioModePushPull,
    .initial = 0,
    .valid = 1,
};

static void SM_relay_gpio_init(void)
{
  ds_gpio_init(&onoffLed[0]);
  ds_gpio_init(&onoffLed[1]);
  ds_gpio_init(&relay);

  uint8_t onoff = 0x00;
  if(getThisParam(onoffState, &onoff) != 0) {
      onoff = 0x01;
      setThisParam(onoffState, &onoff);
  }
  if(getThisParam(ENpbyOption, s_option) != 0) {
      setThisParam(ENpbyOption, s_option);
  }

  if((s_option[1] & 0x03) == 1 ||
     ((s_option[1] & 0x03) == 0 && ((s_option[0]>>2)&0x03) == 1) ||
     ((s_option[1] & 0x03) == 0 && ((s_option[0]>>2)&0x03) == 2 && onoff == 0)) {
      SM_relay_gpio_state_set(0);
  }
  else if((s_option[1] & 0x03) == 2 ||
      ((s_option[1] & 0x03) == 0 && ((s_option[0]>>2)&0x03) == 0) ||
      ((s_option[1] & 0x03) == 0 && ((s_option[0]>>2)&0x03) == 2 && onoff == 1)) {
      SM_relay_gpio_state_set(1);
  }
}

static void SM_blue_led_gpio_state_set(bool state)
{
  if(state) {
      ds_gpio_on(&onoffLed[0]);
  }
  else {
      ds_gpio_off(&onoffLed[0]);
  }
}

static void SM_relay_gpio_state_set(bool state)
{
  if(state) {
      ds_gpio_on(&relay);
  }
  else {
      ds_gpio_off(&relay);
  }
  SM_blue_led_gpio_state_set(state);
  setThisParam(onoffState, &state);
}

static uint32_t SM_relay_state_get(void)
{
  return GPIO_PinOutGet(relay.port ,relay.pin);
}
/*****************key value handler*************************/



static void optionTimeroutHandlerCallback(MultiTimer* timer, void *userData)
{
  (void)userData;
  (void)timer;
  keyValue_t outputKeyValue ={0x00};

  outputKeyValue.id = 0x10;
  outputKeyValue.valueSize = 2;

  if(s_state) {
      SM_relay_gpio_state_set(1);
      outputKeyValue.value[0] = 1;
  }
  else {
      SM_relay_gpio_state_set(0);
      outputKeyValue.value[0] = 0;
  }
  outputKeyValue.value[1] = 0;
  set_key_value(&outputKeyValue);
}

void recv_option_key_value_handler(uint8_t *option)
{
  if((option[1] & 0x03) == 1) {
      SM_relay_gpio_state_set(0);
  } else if((option[1] & 0x03) == 2) {
      SM_relay_gpio_state_set(1);
  }
  else{
      if( IS_PULSE_MODE(s_option) != IS_PULSE_MODE(option) 
		   || IS_PULSE_NO(s_option) != IS_PULSE_NO(option)
	   ){
          if(IS_PULSE_MODE(option))
          {
            softwareMultiTimerStop(EN_LP_HARD_TIMER_EM3_SYS_RTC_1, &optionTimer,0);
            if(IS_PULSE_NO(option))
              SM_relay_gpio_state_set(0);
            else
              SM_relay_gpio_state_set(1);
          }
          else
          {

          }
      }
  }

  //注意！！ 前面不能提前return！！
  if(option[0] != s_option[0] || option[1] != s_option[1] || option[2] != s_option[2]) {
      setThisParam(ENpbyOption, option);
      memcpy(s_option, option, 3);
  }
}

/************************operation key value handler*************************************/

void recv_operation_key_value_handler(uint8_t *operation)
{
  uint8_t timeout = operation[1];

  if((operation[0] & 0x0f) == 0) {

  }
  else{

      if(IS_PULSE_MODE(s_option)){

          if(optionTimer.status == EN_MULTITIMER_STATUS_IDLE){
              if(IS_PULSE_NO(s_option))
              {
                SM_relay_gpio_state_set(1);
                s_state = 0;
              }
              else
              {
                SM_relay_gpio_state_set(0);
                s_state = 1;
              }
              softwareMultiTimerStart(EN_LP_HARD_TIMER_EM3_SYS_RTC_1, &optionTimer, PUSE_TIME(s_option),  optionTimeroutHandlerCallback,NULL,1);
          }

      }
      else{


          if((operation[0] & 0x0f) == 1) {
              SM_relay_gpio_state_set(1);
          } else if((operation[0] & 0x0f) == 2) {
              SM_relay_gpio_state_set(0);
          } else if((operation[0] & 0x0f) == 3) {
              s_state = SM_relay_state_get();
              SM_relay_gpio_state_set(!s_state);
          } else if((operation[0] & 0x0f) == 4) {
              if(timeout>0) {
                  SM_relay_gpio_state_set(1);
                  s_state = 0;
                  softwareMultiTimerStart(EN_LP_HARD_TIMER_EM3_SYS_RTC_1, &optionTimer, timeout*32768,  optionTimeroutHandlerCallback,NULL,1);
              }
              else {
                  SM_relay_gpio_state_set(0);
              }
          } else if((operation[0] & 0x0f) == 5) {
              if(timeout>0) {
                  SM_relay_gpio_state_set(0);
                  s_state = 1;
                  softwareMultiTimerStart(EN_LP_HARD_TIMER_EM3_SYS_RTC_1, &optionTimer, timeout*32768, optionTimeroutHandlerCallback,NULL,1);
              }
              else {
                  SM_relay_gpio_state_set(1);
              }
          }

      }
  }
}

/*******************battery detect***************************/
static MultiTimer iadcTimer;
static uint8_t adcState = 0x00;

static void iadcTimerCallback(MultiTimer* timer, void *userData)
{
  (void)timer;
  (void)userData;

  if(adcState == 0) {
      battery_detect_start(iadcPosInputAvdd);
      adcState = 0x01;
      softwareMultiTimerStart(EN_LP_HARD_TIMER_EM3_SYS_RTC_1, &iadcTimer, 32768*IADC_TIMER_INTERVAL, iadcTimerCallback,NULL,0);
  }
  else if(adcState == 0x01) {
      adcState = 0x00;
      SM_iadc_init();
  }
}

/**
 * @brief: adc init
 * */
static void SM_iadc_init(void)
{
  softwareMultiTimerStart(EN_LP_HARD_TIMER_EM3_SYS_RTC_1, &iadcTimer, 3277, iadcTimerCallback,NULL,0);
}

/**
 * @brief: 获取电压值
 * @return: battery unit:mV
 * */
uint8_t SM_battery_get(void)
{
  uint16_t battery = get_battery_monitor_voltage();
  DS_app_log_error("battery = %d \r\n", battery);
  return battery>1800?(battery/10 - 180):0;
}

/************************temperature get*************************************/

/**
 * @brief: Get the internal temperature of the chip
 * @return: temperature
 * */
int8_t SM_tempDrv_get(void)
{
  float tempCelsius;
  int8_t result;

  tempCelsius = EMU_TemperatureGet();

  if (tempCelsius < INT8_MIN) {
    tempCelsius = INT8_MIN;
  } else if (tempCelsius > INT8_MAX) {
    tempCelsius = INT8_MAX;
  }

  // adding extra 0.5 before truncating to simulate rounding behavior
  result = (((int8_t) (tempCelsius + 0.5 - INT8_MIN)) + INT8_MIN);

  return result;
}

/**********************get hard information***************************/

/**
 * @brief: get hard information
 * @param: point
 * @return: value length
 * */
uint8_t get_hard_information(uint8_t *data)
{
  hardinfo_t hardInfo = {0x00};
  char psn[16] = "DH0280N00001";
  int ret = 0;

  ret = getThisParam(ENpbyKeyM, hardInfo.psn);
  if(ret != 0) {
      memcpy(hardInfo.psn, psn, sizeof(psn));
      setThisParam(ENpbyKeyM, hardInfo.psn);
  }

  ret = getThisParam(ENbyDeviceType, &hardInfo.deviceType);
  if(ret != 0) {
      hardInfo.deviceType = EN_DEVICE_TYPE_IO_WEAK_RELAY;
      setThisParam(ENbyDeviceType, &hardInfo.deviceType);
  }

  ret = getThisParam(ENbyModelType, &hardInfo.modelType);
  if(ret != 0) {
      hardInfo.modelType = 0x01;
      setThisParam(ENbyModelType, &hardInfo.modelType);
  }

  ret = getThisParam(ENbyHardType, &hardInfo.hardType);
  if(ret != 0) {
      hardInfo.hardType = 0x01;
      setThisParam(ENbyHardType, &hardInfo.hardType);
  }

  ret = getThisParam(ENpbyMacID, hardInfo.pmacID);
  if(ret != 0) {
      getMacAddr(hardInfo.pmacID);
      setThisParam(ENpbyMacID, hardInfo.pmacID);
  }

  ret = getThisParam(ENpbyRfVer, hardInfo.pRfVer);
  if(ret != 0
      || hardInfo.pRfVer[0] != MAJOR_VERSION
      || hardInfo.pRfVer[1] != MINOR_VERSION
      || hardInfo.pRfVer[2] != STAGE_VERSION) {
      hardInfo.pRfVer[0] = MAJOR_VERSION;
      hardInfo.pRfVer[1] = MINOR_VERSION;
      hardInfo.pRfVer[2] = STAGE_VERSION;
      setThisParam(ENpbyRfVer, hardInfo.pRfVer);
  }

  ret = getThisParam(ENpbySensorVer, &hardInfo.sensorVer);
  if(ret != 0
      || hardInfo.sensorVer[0] != APP_MAJOR_VERSION
      || hardInfo.sensorVer[1] != APP_MINOR_VERSION
      || hardInfo.sensorVer[2] != APP_STAGE_VERSION) {
      hardInfo.sensorVer[0] = APP_MAJOR_VERSION;
      hardInfo.sensorVer[1] = APP_MINOR_VERSION;
      hardInfo.sensorVer[2] = APP_STAGE_VERSION;
      setThisParam(ENpbySensorVer, &hardInfo.sensorVer);
  }

  memcpy(data, &hardInfo, sizeof(hardInfo));

  return sizeof(hardInfo);
}

/**********************print informatio**************************/
static void printSoftWareInformation(void)
{
  uint8_t macAddr[8] = {0x00};
  getMacAddr(macAddr);
  int16_t txPowerDeciDbm = 0;
  uint32_t ctune = 0;
  char reason[12] = {0};
  uint8_t lfxoTune= 0;

  APP_PRINTF("\r\n*************information***************\r\n");
  uint32_t rst_cause = ds_rmu_init();
  resetToString(rst_cause, reason);
  APP_PRINTF("reset reason   : %s\r\n",reason);
  APP_PRINTF("device mac     : ");
  for(uint8_t i=0;i<7;i++){
      APP_PRINTF("%02x:", macAddr[i]);
  }
  APP_PRINTF("%02x \r\n", macAddr[7]);
  APP_PRINTF("stack version  : v%d.%d.%d \r\n", (STACK_VERSION>>16&0xFF), (STACK_VERSION>>8&0xFF),STACK_VERSION&0xFF);
  APP_PRINTF("app  version   : v%d.%d.%d \r\n", (SENSOR_VERSION>>16&0xFF), (SENSOR_VERSION>>8&0xFF),SENSOR_VERSION&0xFF);
  APP_PRINTF("git  version   : 0x%x\r\n", GIT_VERSION);
  APP_PRINTF("SN number      : %s\r\n", "SM_RL");
  APP_PRINTF("device type    : 0x%02X\r\n", EN_DEVICE_TYPE_IO_WEAK_RELAY);
  printfDeviceRfFreqInfo();
  getThisParam(RfTxPower, &txPowerDeciDbm);
  APP_PRINTF("device power   : %d \r\n", txPowerDeciDbm);
  getThisParam(RfCtune, &ctune);
  APP_PRINTF("device ctune   : %ld \r\n", ctune);
  getThisParam(lfxoCtune, &lfxoTune);
  APP_PRINTF("device lfxoTune: %d \r\n", lfxoTune);
  APP_PRINTF("build app time : %s %s \r\n", __DATE__, __TIME__);
#ifdef  CONFIG_JENKINS_BUILD_NUMBER
  APP_PRINTF("jenkins build number : %d\r\n", CONFIG_JENKINS_BUILD_NUMBER);
#else
  APP_PRINTF("jenkins build number : 0\r\n");//没定义默认0
#endif
  APP_PRINTF("***************************************\r\n\r\n");
}

/***********************get model api******************************/

static uint8_t device_input_output_state_get(uint8_t *buffer)
{
  buffer[0] = SM_relay_state_get();
  buffer[1] = 0x00;
  return 2;
}

uint8_t get_device_state(uint8_t *buffer)
{
  uint8_t data[8] = {0x00};
  uint8_t data_size = 0x00;
  uint8_t index = 0;

  buffer[index] = 0x10;
  index += 1;
  data_size = device_input_output_state_get(data);
  memcpy(&buffer[index], data, data_size);
  memset(data, 0, data_size);
  index += data_size;

  return index;
}

static MultiTimer findMeTimer;

static void findMeTimerCallback(MultiTimer* timer, void *userData)
{
  (void)timer;
  (void)userData;
  uint8_t data[5] = {0};
  SM_led_start(data, NONE_BLINK);
}

void SM_device_QRF_state_Handle(QRFH1_t qrfH1, QRFH2_t qrfH2)
{
  (void)qrfH1;
  uint8_t data[5] = {0};
  if(qrfH2.isFM == 1) {
      data[1] = 15;
      data[3] = 1;
      data[4] = 15;
      SM_led_start(data, FIND_ME_BLINK);
      softwareMultiTimerStop(EN_LP_HARD_TIMER_EM3_SYS_RTC_1, &findMeTimer, 0);
      softwareMultiTimerStart(EN_LP_HARD_TIMER_EM3_SYS_RTC_1, &findMeTimer, 32768*30, findMeTimerCallback,NULL,0);
  }
  else {
      if(findMeTimer.status != EN_MULTITIMER_STATUS_IDLE) {
          softwareMultiTimerStop(EN_LP_HARD_TIMER_EM3_SYS_RTC_1, &findMeTimer,0);
          SM_led_start(data, NONE_BLINK);
      }
  }
}
/**********************set gpio mode default*************************/

void staticPowerGpioInit(void)
{
}

#endif


